(cua--extract-rectangle): Don't use \s in strings.

diff --git a/lisp/emulation/cua-rect.el b/lisp/emulation/cua-rect.el
index 0590af50249ca8cec08768821864e640378c7dc9..e80a332751b5d9e1e917a84983e9fbec16a185fa 100644 (file)
--- a/lisp/emulation/cua-rect.el
+++ b/lisp/emulation/cua-rect.el
@@ -641,11 +641,11 @@ If command is repeated at same position, delete the rectangle."
             (if (= (point) (line-end-position))
                 (setq bs (- r l)
                       copy nil)
-              (skip-chars-forward "\s\t" e)
+              (skip-chars-forward " \t" e)
               (setq bs (- (min r (current-column)) l)
                     s (point))
               (move-to-column r)
-              (skip-chars-backward "\s\t" s)
+              (skip-chars-backward " \t" s)
               (setq as (- r (max (current-column) l))
                     e (point)))
                     (setq row (if (and copy (> e s))